home *** CD-ROM | disk | FTP | other *** search
/ Reverse Code Engineering RCE CD +sandman 2000 / ReverseCodeEngineeringRceCdsandman2000.iso / RCE / Ebooks / ActiveX and VBScript / f13-13.gif < prev    next >
Graphics Interchange Format  |  2000-05-25  |  23.5 KB  |  640x480  |  4-bit (16 colors)
   ocr: Script Wizard - Pagel VBScriptj X 1.Select an Event: 2. Insert Actions: #- pmenul #- pmenul #- pmenu2 E- pmenu2 L window C AboutBox onLoad di Addltem onUnload rl Clear Getltem ] PopUp TH] Removeltem Caption Itemcount () Menuitem Sub window onLoad() call pmenul.Addltem ("Third Option", 3) call pmenul.AddItem("Fourth option", 4) pmenul.caption = "Menu One" call pmenuz.AdaitemlTirst option", 1) call pmenu2.AddItem("Second Option", 2) call pmenuz.Addltem ("Third Option", 3) call pmenu2.AddItem("Fourth option", 4) pmenuz.caption =l "Menu Two" List' View Code View OK Cancel Help